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Building user applications in excel requires knowledge of advanced functions 



PRISTINE 


■ Excel is one of the most widely used tools in financial industry 

• Easy to use 

• High reach & access to software across geographies 

• Flexibility 

• Robustness 

• Inbuilt features (Most people would not even be using 95% of the features) & Extendibility 

• Modular and Object Oriented Architecture 

■ Applications, typically requiring back end calculations can be built using simple Excel 

• Poor user interaction 

• Not that flexible 

• Cannot run for "multiple instances" 

■ Applications building in Excel require understanding of advanced features and functions 

• To collect user inputs in a nice fashion, Graphical User Interface (GUI) can be built 

• To perform any repeated task excel provides Macro Recording 

• To generate complex functions, you can use excel functions 

• To perform complex calculations and operations, Excel VBA (Macros) can be used 
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Useful, if we are trying to build a complex user application 


HDU 

PRISTINE 
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Applications with good user control require advanced features pristine 
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Controlling User Inputs 



naire 

/Strongly 
/ Disagree 

Disagree 

aerned if I use my capital to meet my expenses in 
"earnings 11 during the year. 

/ 0 

□ 

debt is low and my credit history is excellent. 

□ 

□ 

a than five dependents who rely on me for financial 

\ D 

0 

estmerit experience with stocks, bonds and I understand 
investment risk. 

\0 

□ / 


■ Excel sheets and applications requiring inputs from users need to have a good user interface 

■ Excel provides form controls and active x controls to help create a GUI 
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Showing results to users again require creation of dashboards and charts. 
Building flexibility requires advanced excel features 



HDU 
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Flexibility in showing results 


Mean Monthly 
Return 


Maximum 

Return 



Minimum 

Return 


■ Macros can also be used to build flexibility in the output format as well 
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Automation of repetitive tasks in applications 


HDU 

PRISTINE 



Home 


[risen 


Record r lacr 




Use Relati/e Refere 


Visual Macros / 

Basic Macro Security 

Code 


Formu 


Data 


as 


View Developer 


Step Into 


Edit 


Financial-Pi 


Macro 


Macro name: 


4.036 

3 . 5 % 

3 . 0 % 

2 . 5 % 


Record Macro 


Macro name: 


Shortcut key: 
Ctrl H- 


Store macro in: 

This Workbook 


Description: 


Cance 


Training a Robot 


Button 1 Click 


PHDVizZ 


_v 5.xls! filter l_DD_Change 


Using a Robot 


Run 


■ Most applications would require the task to be done for multiple iterations 

• For example formatting charts, etc. 

• For simple routine tasks, Macros can be recorded and used 
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... Automation of repetitive tasks in applications pristine 


4.0% 

3.5% 

3.0% 

2.5% 

2 . 0 % 

1.5% 

1 . 0 % 

0.5% 

0 . 0 % 


Mean Monthly Return 


■ ■nil 


II 


I II II I II 


II I II II I II II I ■! II I II I II II 


II I II I II I II 


■HCOmCN OiiDmOhrtHOOintN^ 
h (N cn m rr in Li id in ^ 00 cn 


W 




Press me to calculate 
Mean Return using MCS 


VBAProject [Financial 

B ■ \ Microsoft Excel Obiec 

a Sheet! (Personal 
a Sheet 10 (Asset V 
a Sheet! 1 (Prospei 
a Sheetl2 (MCS) 
a Sheetl.il (Cover) 
a Sheet 14 (Chart C 
a Sheet! (Goals) 
a Sheet-3 (Pi 

(Assets) 
Sheets [Profile) 
a Sheets (Liabilities 
a Sheet! (Inflows) 


Programmatically performing 
routine tasks in applications 








ix 1 = 1 To n 
Calculate 

Cells £ i + 2 , 11) 
Cells (i + 2, 12} 
Cells £ i + 2 , 13) 
Cells (i + 2 r 14) 



Cells (21, 
Cells (22, 
Cells £23, 
Cells £24, 


SumA + Cells £i + 2, 11) 

3umE + Cells (1 + 2, 12) 

3uinC + Cells (1 + 2, 13) 

5ihdD + Cells (1 + 2, 14) 


■ Most applications would require the task to be done for multiple iterations 

• VBE can be used to programmatically perform routine tasks repetitively for complex calculations 


© EduPristine 


Macros 


9 





Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 
• Introduction and context 


Key Concepts in Macros 


■ Macros as recorded Robots! 

■ Designing application to gather user data 

• Implementing user forms in Excel Macros 
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What are Macros? 



PRISTINE 



Automate 

Routine Tasks by Recording 


Automate 

Routine Tasks by Programming 


■ A macro is a set of computer instructions 

• A mini-computer program 

• Activated by an event 

• That tells the computer what to do 


© EduPristine 


Macros 


11 


Steps in Using Macros 



hdu 

PRISTINE 


Train the Robot 



Use the Robot 



Retrain 



Reuse 


The Robot is as good as you have trained it! 


■ Typically the first level of Macro can be created by Recording the macro 

■ A little bit of understanding of VB can help improve the usability multi-fold 
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The VB Editor pristine 


■ Right click on any existing ribbon tab and choose customize the ribbon. Check the developer tab box and 
click OK. 


Right click on existing 
tab and choose 
customize the ribbon 




Check the 
developer tab 
box. 



El 0 Insert 
+ J Page Layout 
0 y Formulas 
0 0 Data 
0 J Review 

[+1 Developer 


0 |7| Add-Ins 
0 ;/ Acrobat 
0 / Background Removal 


E 



New Tab 


New Group 

Rename... 


Customizations: 


Reset 





Conditional Format Cell 


Formulas Data 


Review 


Developer 


Macros - 2 - Microsoft Excel 

Acrobat 


= W ^WrapTeid 


Alignment 


General 

T 

, $ ’ % * 

+.0 M 
,#D ->.0 

\ Number 

ll 


formatting* as Table * Styles 

Styles 


Click OK. 


Now developer tab is 
in the menu bar. 
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The VB Editor 


■ Click on the developer tab on the ribbon and then Go to Visual Basic. 



PRISTINE 



-1 ' v 

Home [nsert 


Page Layout 


Formulas 


Data 


Review 


View 


Developer 


Macros -2 - Microsoft Excel 
Acrobat 


Record Macro 


Macro 5 



ril Use Relative References 


! \ Macro Security 
Code 






Add-Ins COM 
Add-Ins 

Add-Ins 


[gf Properties 


& View Code 

Insert Design 
r Mode II ^ un Dialog 

Controls 



_l 1 


H== | 



Source 


^ Map Properties Import 
4_J Expansion Packs 

*^1 Refresh Data 
XML 



Visual Bas 

ic tAlt^FIl) 

Open th 

a Visual Basic editor. 


Document 

Panel 

Modify 


(Q} Press Fl\for more help. 


D 

E 

F 

G 

H 

i 

J 

K 

L 

M 












You can select the Visual Basic 
option under the developer tab 
or by using shortcut Alt+Fll. 
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The VB Editor 



PRISTINE 


■ The Visual Basic window is open. 
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Switching From the VB Editor to Excel 


HDU 

PRISTINE 


■ Click on the first button on the VB editor toolbar. It takes back to the excel. Switching between VB Editor 
and Excel is also done by using keyboard shortcuts Alt+Fll. 


Click on the button 
for switching back to 
Excel from VB Editor 
toolbar. 


ft 


Microsoft Visual Basic for Applications - Bookl 


_ n 


FMf Frlit View Insert Format 


- q i x ifr a 

Project - VBAProject 


Debug Run Tools Add-Ins Window Help 

i P* U ii ts \&\ 




B •••<!© VBAProject (Bookl) 

Microsoft Excel Objects 
■m Sheetl (Sheetl) 
ThisWorkbook 


Properties - Sheetl 


X 


Sheetl Worksheet 


Alphabetic 


Categorized 


(Name) 

Sheetl 

DisplayPageBreak False 

DisplayRightToLef False 

EnableAutoFilter 

False 

EnableCalculation 

True 

EnableFormatCon 

True 

EnableOutiining 

False 

EnablePivotTable 

False 

EnableSelection 

0 - xlNoResfrictii 

Name 

Sheetl 

ScrollArea 


StandardWidth 

8.T3 

Visible 

-1 - xlSheetVisib 
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Introducing the VBA Environment 


HDU 

PRISTINE 


^Microsoft Visual Basic - HSBC-Pristine-Day5 v2.xls - [Module3 (Code)] 





File Edit View Insert Format Debug Run Tools Add-Ins Window Help 


T id I HL ^ A 


roject - VBAProject 


E 

+ 

+ 

& 


ASAPUtilities (ASAP Utili 
atpvbaen.xls (ATPVBAEh 
funcres (FUNCRES.XLA) 
VBAProject (HSBC-Pristh 

E Q Microsoft Excel Objects 
a Sheet 1 (A) 
a Sheet2 (B) 
a Sheet3 (CJan) 
a SheeU (CFeb) 
a Sheets (CMar) 
fi] SheetsVcConsolidat 
a Sheet? \cGonsolidat 
:|P] ThisWorkbook 
Modules 
*!:* Module 1 
*l:| Module2 
*l:| Module3 


B 




\ 


dr W I ® I Ln 1, Col 1 


(General) 


Consolidate 


p ub C □ ri3 □ 1 i date ( ) 


Type a question for help ▼ _ fii x 


Code 

Window 


Macros Macro 

Mac r o rec o r de d W 15/2009 b y P ar ainde e p 
Ke yb o ar d S ho r t c ut k C t r 1 +S h i f t +K 
Act iveCell . ForrnulaRlCl = _ 

pp =VLOOKUP (RC[-l\, CJan!RC[-l] :R[7] C[2] , 4, FALSE) + VLOOKUP (RC [-1] , CFeb ! RC [-1] : R[7] C [2] , 4, FALSE) + VLOOKUP (RC [-1] , CMar 
Range ( rr E2 rr ) .Select 
ActiveCell . FormulaRICl = 

pp = VLOOKUP (RC [-1] , G^an\R2Cl:R9C^ f 4 , FALSE ) + VLOOKUP (RC [-1] , CFeb ! R2 C 1 : R9C4 , 4 , FALSE ) + VLOOKUP ( RC [ - 1] , CMar ! R2 C 1 : R9C4 , 
Range ( PP E2 PP ) .Select 

Selection. AutoFill Destination: =Range ( PP B2 : B9 PP ) 

Range ( PP E2 : B9 PP ) . Select 
End Sub 


Run and Control 
Commands 


Project 

Explorer 


Use Alt + Fll to get the window 


r 
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A Tour of the VB Editor Screen 


HDU 

PRISTINE 


■ For Project Explorer window, go to View>Project Explorer or use shortcut Ctrl+R. 

■ For Properties Window, go to View>Properties window or use shortcut F4. 


g Microsoft Visual Basic for Applications - Macros - 2,xlsm - [Sheet! 


File Edit 


View 


(General) 



.] t 


Insert Format 

Debug 

Code 

F7 

Object 

Shift-*- F7 

Definition 

Shift+FZ 

Last Position Ctrl + 

Shift+FZ 

Object Browser 

F2 

Immediate Window 

Ctrl+G 


Locals Window 
Watch Window 
Call Stack,.. 

m Project Exp I 


Ctrl+L 


orer 


Ctrl+R 


Properties Window 
$$ Toolbox 
Tab Ordei 


F4 


Go to Project explorer under the 
View tab for open the Project 
Explorer Window or use Ctrl+R 

shortcut. 


Microsoft Visual Basic for Applications - Macros - 2.xlsm - [Sheet] 



File Edit 

E! - y 


Project - VBAProje 




E M Sohrer [SC 
VBAProjec 

El-® Microso 


She. 


^iewj Insert Format Debug Run Tools 


0 jU 

t3r 


® This 
□■■■Q Modules 
Moc 



Code 


Object 


F7 

Shrft+F7 




Definition 

Shift+F2 

Last Position Ctrl+ 

Shift+FZ 

Object Browser F2 

Immediate Window 

Ctrl+G 

Locals Window 


Watch Window 


Call Stack... 

Ctrl+L 

Project Explorer 

Ctrl+R 


Prop erti es Wind o w 


F4 


Toolbox 
Tab Order 


Go to Properties window under 
the View tab for open the Project 
Properties Window or use F4 

shortcut. 
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Moving the VB Editor Windows 


The Side panel is moving to any other place by simply drag it from original place and drop it down to new 
place. 


Microsoft Visual Basic for Applications - Eookl 


© 


Fife |dit View Insert Format Debug Run Tools Add-Ins Window Help 

- a * .) A H -) e ► u a K %f i» OF 0 

* 


Project - V BAP reject 

aa j 


m 


& 4$ VBAPpoject (Books) 

a igi Microsoft Excel Objects 
SO Sheet l (Sheet l) 
SO Sheet2 (5heet2) 
H] Sheets (Sheet3> 
ThisWDrfdjool? 



Move the panel from left 
side to right side 


i pe a question for help 




Properties - Sheet! 


Sheet 1 Worksheet 
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Sheet l 

DffiptayPageBreak False 
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EnableAutoFilter 

False 

EnableCalcula bon 
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EnableForma ECon True 

EnableOu timing 
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EnablePivotTable 

False 

EnableSdection 

Q - jdNoRestricbi 

Name 

Sheet 1 

ScroflArea 


5 tender dWrdth 

3,4S 

Visible 

-I - xlSheetVisib 




PRISTINE 


© EduPristine 


Macros 


19 




Creating Modules 


HDU 

PRISTINE 


■ There are different ways to create a module. One is right click on any where inside the Project window>Go 
to lnsert>Module. 

■ The Module is inserted under the Module Folder. 


Right click on 
Modules 


Go to Insert 


Project - VBAProject 




i-Sl 

■III 1 "fa 


0 ^ Solver (SOLVE fLXLAM) 
VBA Project (Macros - Jj 

0 r~i Microsoft Excel Objects 
Sheet! (Sheet!) 
i-^Tl ThisWorkbook 



(General) 


View Code 
j j) View Object 


VBAProject Properties... 



Insert 


Alphabetic Cate 


Import File... 

Export File... 
Remove 

i-Jti Print... 

Dockable 
Hide 

il 


UserForm 


Module 




^ £larc Module 




Project - ,'BAProject 





Select Module 


m 


a 



0-1 

f| Sohrer (SOLVE FLXLAM) 

}$ VBAProject [Macros - Z., 



□ 


□■■■ ■. Microsoft Excel Objects 

■|f] Sheetl (Sheet!) 

^ ] ThisWorkbook 
Modules 
Module! 

Module! 



rrr 



A new Module is added 
under Modules Folder 
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Creating Modules pristine 

■ The Second way is go to insert in the menu bar and click on the Module. 


The Another way is 
Go to Insert Tab 



c for Applications - Macros - 2.xlsm - | 


Insert I Format Debug Run 


| r* 

Procedure... 

ll 

UserForm 


Module | 


Class Module 

L W Jj ■— ■— bW 

File... 


eti [Sheet I) 
Workbook 


J. .U 1 


Select Module 



Project - VBAProject 


0- 

0- 


ca 


Jm 





Solver [SOLVER.XLAM) 
VBAProject [Macros - 2 ., 3 
Microsoft: Excel Objects 
■SP) Sheet! (Sheet!) 

■^| ThisWorkbook 
Modules 
Module! 

*1* Module! 






Module 3 I 


/ v 




4 

rrr 


k 




A new Module is added 
under Modules Folder 
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J . 

Removing Modules pristine 


■ For deleting the Module, Right click on Module and click on Remove Module. Click on 'NO'. The module is 
deleted. 



Microsoft Visual Basic for Applications 



Select "Remove 
Module3" 




S ^ Solver (SOLVE FLXLAM) 
VBAProject (Macros - 2,j 
□■■■ i Microsoft Excel Objects 
Sheet 1 (Sheetl) 

20 ThisWorkbool 
□■■■ v Modules 

Module 1 
ModuleZ 





Module3 is 
deleted 


rrr 
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Renaming Modules 


UDU 

PRISTINE 


■ To rename the modules, first select the modules then go to Properties Window and rename it. 


Select the Module which you want 
to rename. Go to Properties 
window, and rename it 


[±1 

...f Mnrli jIp>? 


1 1 

vwrf* riuuuics 

Module 1 
%l:i Module! 


4 

rrr 

t 



Properties - Module! 

*J 

Module! Module 


Alphabetic Categorized | 


|fFlhe_Basic 

1 




□-Q Modules 

■alt Module 1 


Hhe Basic 



4 

rrr 


Properties - The_Basic 


*1 

The_Basiic Module 

T 


Alphabetic Categorized 


[Name) 


The Basic 


Name of the 
module is 
changed 


■ The name of modules follow some rules that you can't use spaces between the name of the modules. You 
can use the underscore character in place of space. 


Space between the 
name is not allowed 



Properties - The_Gasie 


Tfoe_Ba5tc Module 
Alphabetic | Categorized 


[Name) 


The Basic| 



2] 



Microsoft Visual Basic for Applications 




( Not a legal object name|7he Basic 1 





Error showing that 
module name is not 
legal 
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Setting Up the VB Editor Fonts 



QXI 

PRISTINE 


■ For editing the setting of VB Editor Fonts, Go to Tools Tab in menu bar and then click on Options. 


For editing the setting, 
Go to Tools menu 




Go to Editor Format tab. Now you 
can change the setting of VB Editor. 


Options 


0 







Editor |^Edto^Fomn^ General Docking 
rCode Colors 


Normal Text 


Selection Text 
Syntax Error Text 
Execution Point Text 
Breakpoint Text 
Comment Text 
Keyword Text 


Foreground: Background: Indicator: 

I Auto ""3 I Auto I Auto 

II II I JBBBBSSU 


Font: 

| Courier New {Western} ▼ | 
Size: 

l 12 _d 

w Margin Indicator Bar 
r Sample 


ABCXYZabcx 






- 0K J 

| Cancel | 

Help | 
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Setting the Right Macro Security Levels 



mu 

PRISTINE 



A 1 





Home Insert 

Page Layout 

Formulas 

Dal 




Record Macro 
se Relative References 


Visual Macros 
Basic 





Code' ' 


J1I 


i Name oft g Press 
Date of the 1 raimn 


2 

3 

4 

5 

6 


Macro &e:unty 

Customize the macro security 
settings 


c 

Zf 


framing Course INa 


Add-Ins COM 
Add-Ins 

Add-Ins 


FI for more help. 


D 


me FM 


■ —■ 


Inse 


Macro security can be changed by "Macro Security" 
option under the developer menu tab or "Options" 

under the File Menu. 


[S I Jd “7 • O' - I - 

Home tn s e rt 




S ave 

i jisi . Save As 

Save as Adobe PDF 
tJj Open 
Close 


#r!l Macros -2 



Recent 

New 

Print 

Save & Send 
Help 



■ Macros are dangerous snippets of code and can be built with malicious intent 

■ Macros need to be enabled for the application to run properly 
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Changing Macro Security Levels 



PRISTINE 


Excel Options 


Go to Trust 
Center 



General 

Formulas 

Proofing 

Save 

Language 
Advanced 
Customize Ribbon 


Quick A, 
Add-In 


0 


Toolbar 


Trust Center 


9 


Help keep your documents safe and your computer secure and healthy. 


Protecting your privacy 

Microsoft cares about your privacy. For more information about how Microsoft Excel helps to protect your privacy,, please 
see the privacy statements. 

Show the Microsoft Excel privacy statement 

Office.com privacy statement 

Customer Experience Improvement Program 

Secu rity fit m ore 


Learn more about protecting your privacy and security from Office.com. 

M i cro s oft T ru stwo rthv Co m p uti n a 

Microsoft Excel Trust Center 

The Trust Center contains security and privacy settings. These settings help keep your 
computer secure. We recommend that you do not change these settings. 


/ 


0 



OK 


Cancel 


Select Trust 
Center Settings 
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Changing Macro Security Levels pristine 


Trust Center 


\f_ 


Select the Macro 
Settings 


i rusted Publishers 


Trusted Locations 


Trusted Documents 


Add-ins 


ActiveX Settings 


Macro Settings 


d Vievv 

O 


Protected Vis 
Message' 
External Content 


File Block Settings 
Privacy Options 


Macro Settings 

Disable all macros without notification 
Q Disable all macros with notification 

Disable all macros except digitally signed macros 

Enable all macros (not recommended; potentially dangerous code can run) 
Developer Macro Settings 

] Trust access to the VBA. project object model 



After Changing 
the setting, Click 
OK 
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Saving Workbook Containing Code 



PRISTINE 


[§ 1 |9 T c - 1 - 

Bookl - Microsoft Excel 

Home 

IX] Save As 

i— 


£ Cut 

D 


Paste 


l4i Copy T 
Jf Format Paint 
Clipboard 


DS 


1 Name of the Trainl 

2 Date of the Trarni 
Training Course N 


File Name 


10 


11 


12 


13 


14 


15 

16 




\M 

« Excel VBA Introduction ► Excel 

- 



Search Excel 



Desktop 
Downloads 
Vj Recent Places 

.. Libraries 
I Documents 
, J’ Music 
Bl Pictures 
Q Videos 


Name 


Date modified 


Type 


No items match your search, 


A 




rrr 


Authors: admin 


* Hide Folders 


— 



i ags: Add a tag 


T oois T 


Save 


17 
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Save your file as Excel 
Macro-Enabled 
Workbook format 



Frit nanife: 

Macros - 2 

- 


Save as type: 

Excel Macro-Enabled Workbook 

- 


Cancel 





Conditional Format 
Formatting T as Table 

Styles 


Cell 

Styles 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 
• Introduction and context 

■ Key Concepts in Macros 


Macros as recorded Robots! 


■ Designing application to gather user data 

• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 

■ Understanding VBA 

• Understanding the relevant language constructs 

• Example: Write your First Macro 

■ Debugging VBA code 

• Errors in VBA 

• Step into VBA 

■ Writing more VBA Codes 

• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 

■ Advanced Financial Applications 

• Breaking circular loops 

• Monte Carlo Simulation 


© EduPristine 


Macros 


29 


Training the Robot - Recording a Macro 
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■ L ~ 







Home 

Insert 

Page Layout 

Formulas 

Data 

Review 

View 



Visual Macros 
Basic 


Record Macro 
Use Relative Referer 
A Macro Security 


Record Macro 




Macro name: 



Code 
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11 

12 

13 

14 

IE 


k 


acrol 


1Q% n 


3^ 




- 


2*. - 




Shortcut key: 
Ctrl+ 

Store macro in: 


This Workbook 


Description: 


Developer 





Record Macro 



Macro name: 
|FornnatSheet 


Shortcut key: 



Store macro in: 



This Workbook 

3 


Description: 

Macro recorded 5/14/2009 by Paramdeepl 


OK 


Cancel 



■ Name the macro 

■ Shortcut key - fill in a letter in the available space 

• Allows you to run the macro by holding down the CTRL key and 
pressing the chosen letter on the keyboard 

■ Description 

• Description of the macro 




Visual 

Basic 



A Stop Recording 


Macros 


Use Relative References 


A Macro Security 


Code 


nn 


77 




r i 

Remember to Stop the recording! 

k j 
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Using the Robot - Using Macros 


QXI 

PRISTINE 



■ Use the Run Macro or shortcut key assigned to run the macro 


r ^ 

Use Par_01_CopyMe-MacroRecording 

L. J 
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D1 




Copy Me 



1 A 

B 

C 

D 

E 

1 

Copy Me 



[copy Me 1 
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So what's inside the Macro? pristine 


3 Microsoft Visual Basic - Book! - 

[Mod u lei [Code)] 

m 

File Edit View Insert 

Format 

Debug Run Tools Add-Ins window Help 

m 

i5! t iU #> - j i 

off (-J 

► DU J i? t3? > (§> Ln 12, Coll 


roject - VBAProject 



± 1 - 

El- 


atpvbaen.xls [ATPVBAEN.XLAM) 
VBAProject [Bookl) 

B - W Microsoft Excel Objects 
Sheetl (Sheetl) 

Sheetl (Sheet!) 

Sheet! (Sheets) 

■3^] ThisYVorkbook 
0- | Modules 

*1! Module 1 

M VBAProject [FUNCRES.XLAM) 






(General) 


Sub CopyMe() 

GopyMe Macro 

Keyboard Shortcut: Ctri+Shift+C 


Selection . Copy 
Range ( "Bl") .Select 
Active Sheet . Paste 
Application. Cut Cop yMode = False 
End Sub 


Use Alt + Fll to see what Excel writes inside 


v * * s * i ■ mmmsm i wm u mm ■ wmmmmm i ■ i mmm mm mu m mm ■ ms mm mmm i ms m mm ■■ mmmmm * i * : * * ... . ^ 
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If we had used relative references? pristine 



Code 


Controls 


Developer 

^ Map Properties 
r^fExplTTrii 

i Refresh Data 
XML 


Relative Referencing works like cell 
referencing without "$" 


V 
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So what's in the code now? 


End Sub 
Sub C op yMe Re I a t i ve ( ) 


CopyMe Relative Macro 



Keyboard Shortcut : Ctrl+Shift+D 


Application . CutCopyMode = False 
ActiveCell . Select 
End Sub 
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Simple Example - Automatically format charts in Excel 


■ t + 


] 


2 

3 

1 


D 

7 


3^ 

3 

3 


2 

3^ 

1 


6000000 
5000000 
4000000 
3000000 
2000000 
1 000000 
0 



A 

B 

C 

D 

E 

F 

G 

H 



Inputs 




















Product 

Sales 




1 




VisualizeFRM 

1000000 




1 - 



Mock FRM 

500DD0 








FRM Trainings 

5000000 









CFA Trainings 

3500000 









PRM Trainings 

3000000 



















Sales 


□ Sales 


VisualizeFRM Mock FRM FRM Trainings CFA Trainings PRM Trainings 


HDU 

PRISTINE 


■ Unformatted "default" chart in Excel 
• Format it once and record for further use 




Use Par_02_Chart-Recording-Macro 


■ , > ... . .... .. .... ; .... .. /. ; ; . . :.. ‘ :. ' . , v;, ./ 
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Create a New Macro - Format Chart 



fIDU 

PRISTINE 


Record Macro 


Macro name: 

I For mat Chart 



Sales 


Shortcut key: Store macro in: 

Ctrl+P“ 

Description: 


This Workbook 


Macro recorded 5/14/2009 by Paramdeepl 



OK 



*1 


Cancel 


□ Sales 


■ Create a new macro 

• Record the steps performed to update the chart as per the standards required 
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Record all steps in the macro 



rrnu 

PRISTINE 


Sales 


6000000 
5000000 
4000000 
3000000 
2000000 
ioooooo i 
0 


0 




* 

Format Gridlines... 



Clear 





m 



m 





ales 


VisualizeFRM Mock FRM 


FRM 

Trainings 


CFA 

Trainings 


PRM 

Trainings 




Sales 



■ Record all steps performed to change the formatting and stop the recording 


© EduPristine 


Macros 


38 


Select the new chart to be formatted and run 


PRISTINE 



1 

L , 









Product 

Sales Prq 

lections 







1 

VisualizeFRM 

1350000 

r 








Mock FP.M 

675000 









FP.M Trainings 

6750000 









CFA Trainings 

4725000 








1 

PPM Trainings. 

| 4050000 | 



















i ■ ■ 


Sales Projections 


■ 


8000000 
7000000 
6000000 
5000000 
4000000 
3000000 
2000000 
1 000000 
0 






Plot Area 
























#■ 






<2 




ft 
















(S 


ft 






tf 


4 & 




£ 


□ Sales Projections 


i 


■ Select the new chart that has to be formatted 
• Run the macro 
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The macro would automatically make the formatting consistent 


HDU 

PRISTINE 


Sales Projections 



■ With a single keystroke you can format your charts 
• For example B, CTRL + q is the key 
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Automatically generated Macros are not very robust 


HDU 

PRISTINE 


■ Even small changes in the expected step would cause 
the macro to throw errors 

• Need to understand the code 

• Slight modifications in the code can make the macros 
much more robust 

S ub F o rrnat C har t ( ) 

i 

1 F □ on at C har t Mac r o 

1 Mac L'o r e c o r cle d 5/15 / 2009 to y P ar amde e p 

i 

1 Ke yto o ar d S ho rtcut : C tr 1 +q 

i 

Select ion. AutoScaleFont = True 
Uith Select ion. Font 

.Name = "Verdana" 

.Size = 10 

.Strikethrough = False 
.Superscript = False 
.Subscript = False 
.QutlineFont = False 
.Shadow = False 

.Underline = xlUnder lineStyleNone 
.Color Index = xlAutomatic 
.Background = xlAutomatic 
End Uith 

ActiveChart . Legend. Select 
Selection. Delete 

ActiveChart .Axes (xlValue) . Major Grid lines .Select 


Microsoft Visual Basic 


Run-time error '1004': 

Select method of Gridlines class failed 


Continue 


End 


Debug 


Help 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 
• Introduction and context 

■ Key Concepts in Macros 

■ Macros as recorded Robots! 


Designing application to gather user data 


• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 

■ Understanding VBA 

• Understanding the relevant language constructs 

• Example: Write your First Macro 

■ Debugging VBA code 

• Errors in VBA 

• Step into VBA 

■ Writing more VBA Codes 

• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 

■ Advanced Financial Applications 

• Breaking circular loops 

• Monte Carlo Simulation 
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Form Controls and Active X controls 


\ZDU 

PRISTINE 



ActiveX Controls 

Form Controls 

Toolbar 

Control Toolbox 

Forms 

Macro code storage 

In the code module for the 
Sheet 

In any standard VBA module 

Macro name 

Corresponds to the control 
name (e.g., 

CommandButtonl_Click) 

Any name you specify. 

Correspond to... 

UserForm controls 

Dialog Sheet controls 

Customization 

Extensive, using the Properties 
box 

Minimal 

Respond to events 

Yes 

Click or Change events only 

Inserting 

Design Mode 

Normal 

Assigning Macros 

No Arbitrary Macro Can be 
assigned 

Macros can be assigned 



Insert 


Design 

Mode 


Form Controls 


i 


Properties 
View Code 
Run Dialog 





□ a* i *i jd J 


ActiveX Controls 

-i _| F JH |5i *j 

±1© A 


r 



For 
In c 
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Creating a Model for CAPM 



PRISTINE 


it 


Formulas 


Data 


Review 





.-'Sw 

\.Js 

Properties 
View Code 


Insert 

Desiqn 

tl] Run Dialog 


T 

Mode 



Controls 


g] 


jr 


w 


Developer 


Source 


ap Properties ^Import 
Exp a n s i o n Pa cks Export 

Refresh Data 

■ 

XML 


Limitation: A +ve # 



O 

O 


o 

o 


o 

o 


Format Control 




o 

o 



© 




Insert 

Design 


Mode 


Properties 



Using Form Controls 


To Select: Right Click! 


Assumptions 

Risk Free Rate 


jt 

Cut 



Copy 


& 

Paste 



Grouping 

► 


Order 

► 


Assign Macro... 



Format Control... 







To Link to a cell 


Assumptions 





J Risk Free Rate 


=E 3/100 

i" L 


Y 

n- 



^ L l ■ 



To Covert to %age 


© 


Use Par 03 CAPM-GUI 
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Playing with the changes pristine 


Beta 

Markpt Prpmiiinri 



A Linear Transformation to 
generate desired output 


Jt 


Formulas 


Data 




Design 

Mode a Run D 


Form Controls 



C\Aa * 

ActiveX Controls 


_i _|F Jiipr - 

±1© AE 



Different Controls can be used for 
different user inputs 


7 % 

-1 


4 

E I 

4 


| FALSE | 


Fore 


A /"■ 


Custom Format 


Category: 


General > 


Sample^^ 

Numoer 

Currency 



Accounting/' 

Type: 

Date i 



Time 


fff 

Percentage 


General 

Fraction 


0 

Scientific 


0.00 

Text 


#,##0 

Special 


#,##0.00 

Custom 


# , ##0 } -#, ##0 

i 


# r ##0:IRedl-#r#-S 


Risk Free Rate 
Beta 

Market Premium 
Add a Country Premium 

Cm intro Pmirniiim 



Link to the cell 
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J 

Formatting the Scroll Bars pristine 



Select all scroll bars by click and 

Ctrl key 


BookJ - Microsoft txcel 


Page Layout 


Formulas 


Data 


Review 


View 


Developer 


a n 



0“ 


jins Orientation Size Print Breaks Background Print 

” T Area”- T Titles 

Page Setup 


'emium 

n 

on 


i. n i Width; 
jJ Height: 
■ 4] Scale: 


Automatic T 


Automatic T 


100% 


Scale to Fit 


Gridlines 
View 
Print 


Headings 


V View 
Print 


Sheet Options 


[fn ch 

4] HU 

& 

Ci 

nc c 

+ 1— s 

Bring to Send to 

Selection 

Atrgn 

Group Rotate 

Fronts Back”' 

Pane 

T 

T T 


□ 


7 % 

-1 

3 % 

3 %' 


;< c 

O 

a 

0 

o 

t 

« r 

i 

Y 

4 

i 

f 



o 

o 

4 

Y 


o 

9 

0 

O 

o 


rran 


(1 t 


c 

D 

E 

F 

G 

H 

1 

J 

K 

L 

M 


Align Left 


£ 

^i 

507 

dDi 
□ 0 ° 


,4 


Align Center 
Align Right 


Align Top 
Align Middle 
Align Bottom 


Distribute Horizontally 
Distribute Vertically 


Sna^to Grid 
Snap to Shape 
View Gridlines 
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Linking the Model 


CAPM Model 
Assumptions 

Risk Free Rate 
Beta 

Market Premium 
Add a Country Premium 
Country Premium 
Calculations 

Return Expectation 



=D3+D4*D5+IF(E6, D7, 0} 


© EduPristine 


Macros 



PRISTINE 


Based on the User Inputs, Generate 
the return Expectation 


47 




Creating Flexible Charts pristine 



EEITDA Margin 
EBIT Margin 
PET Margin 


PAT Margin 



Create the Chart Based on the Data 


Use Par 04 FlexiChart 
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Create Decision controls and link to cells 



EDU 

PRISTINE 


Colors and Lines 

Size 

Protection 

Properties 

Web 


Value 


Control 


JfQUt 


Formulas 


O 



Insert 


gf Proper 


qp View C 

Design 

Mode 1 Run Di 


For m Cont rols 

— III 1^ '_v\ — 2l ' : 

D Ai a abl _|t| _if~ 


ActiveX Controls 


II fina 


—i Si Hit 

4J A 


1. z 


is) 


o Unchecked 
Checked 
Mixed 


Cell link: 







EEITDA Margin 


EBIT Ma 


ft □' B lf /|a 

&:j:j 


r 

ar 


gin 

gin 

^in 




O 


zl to Selection 
:k v Pane 


^ EBITDA Margin 
6=S4OS:j^0_ EB|T Mar?jn 


n 


PBT Margin 


Align Group F :>i ate 
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Linking Data to decision 



PRISTINE 


hs) 


FY05A 


FY06A 


F 



TRUE 

i 

LU 

t 

LL 

II 


TRUE 

17% 

17% 

TRUE 

2% 

5% 

TRUE 

1% 

3% 


a for Chart 

■ — i 

EBI 'DA Margin 
EBP Margin 
PBT Margin 
PA"' Margin 


■ " 

45% Q 


40% 

35% 

30% 

25% 

E 

20% 

15% 


If the appropriate series is selected, show 

the ratio, else hide 


Change linkage to new block 


TRUE 

■ 

38% 

40% 

41% 

42% 

39% 

TRUE-"-" 

17% 

17% 

22% 

25% 

27% 

19% 

TRUE 

2 % 

5% 

12% 

17% 

21% 

16% 

TRUE 

1 % 

3% 

8% 

11% 

14% 

10% 


-o 


O 






EEhDA Margin 

Legend | 


EBIT Margin 
PBT Margin 
PAT Margin 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 

• Introduction and context 

■ Key Concepts in Macros 

■ Macros as recorded Robots! 

■ Designing application to gather user data 

• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 


Understanding VBA 


• Understanding the relevant language constructs 

• Example: Write your First Macro 

■ Debugging VBA code 

• Errors in VBA 

• Step into VBA 

■ Writing more VBA Codes 

• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 

■ Advanced Financial Applications 

• Breaking circular loops 

• Monte Carlo Simulation 
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Basics of VBA - Introduction to Sub and Function 


PRISTINE 


■ VBA procedure 

• Set of instructions given to the "Robot" to execute 

• Perform tasks such as calculating equations, analyzing 
data, communicating with excel/ databases, etc. 

• Block structured as a Sub or Function 

■ Constructed from statements 

• Declaration (Robot's memory) 

• Assignment statements (What is put in that memory) 

• Execution (What actions to perform) 

■ Procedures are typed and stored in a Module/ worksheet 

■ Functions/ Sub are run line by line from beginning to end 

■ VBA has two types of procedures 

• Sub (A subroutine, which performs a small task for you!) 

• Function procedures (It performs some tasks and returns 
a value to you) 


ill t id l 

roject - VBAProject 




a. a. 
lTO 


> jj J 



xls [ATFVE 
VBAProject (FUNCRE' 
3 ^ VBAProject [PriceJV* 
B " i Microsoft Excel Qbje 
Sheet 1 (MCS) 
■Iff] Sheet! {Cover; 
^ ) ThisWorkbook 
□- 3 Modules 

Module 1 


Sr ty 


(General) 


Sub But t onl_C lick ( ) 

Dim NewFrice As Double 
Din NewVolume As Double 
Din NewRevemie As Double 
Din Count As Integer 
Din FinalFrice As Double 
Din Final Vo lune As Double 
Din Final Revenue As Double 
Din Max As Integer 
Din MaxMax As Integer 
Din MinFrice As Double 
Din Min Vo lune As Double 
Din MinRe venue As Double 
Din MaxFrice As Double 
Din MaxVolune As Double 
Din MaxRe venue As Double 


Final Revenue = 0 
MaxMax = Cells (l r 2) 
= r*= ii i =? ro ? \ 


© EduPristine 


Macros 


52 



Basics of VBA - Introduction to Variables 


Variables are like buckets 

• Hold content for you 

• The contents of the variables can change 

• Actually variables are areas allocated by the 
computer memory to hold data 

• Each variable has a 

> Name 

> Type 

In VBA to Declare a new variable (Dim is the 
keyword) 

• Dim myPassword As String 

• Dim firstNum As Integer 

• Dim aLargeNumber As Double 

Variables can be used to store data 

• myPassword = “whatever” 

• firstNum = 10 

• etc 
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Din NewFrice As Double 
Din NewYolune As Double 
Din NewRe venue A s Double 
Din Count A s Integer 
Din FinalFrice As Double 
Din Final Volume As Double 
Din Final Revenue As Double 
Din Max As Integer 
Din MaxMax As Integer 
Din MinFrice As Double 
Din MinYolune As Double 
Din MinRe venue As Double 
Din MaxFrice As Double 
Din MaxYolune As Double 
Din MaxRe venue As Double 


Final Revenue = 0 
MaxMax = Cells (1 F 2) 

Max = Cells (2, 2) 

■Worksheets ( "Sheetl") . Range (Cell 
Selection . Clear 


Range ( ri el : f 300") .Clear 


53 


Example: Write your First Macro 



PRISTINE 


Write a macro which will add a new worksheet, then it will populate the content as shown in below figure: 


FILE 


HOME 


INSERT 


PAGE LAYOUT 


FORMULAS 


DAT A. 


REVIEW 


VIEW 


I n s_jD 5 _ rvl y First M aero - Exc 
DEVELOPER 


■B 

P aste 

Cut 

IT’- 

Ca 1 i b ri 

q-r, - 

AT 

A 



■ 55 - ^ 

[§*■' Wrap Text 

G en era 1 

1=1=1 Copy T 
^ Format Painter 

B T 

U - Hi - 

- i 


— 

— 

| €=-E= 

*■ Merqe Si Center T 

$ T 


Clipboard ri 


Font 


ri 



Alignment ri 

Number 


G14 


/ 



A 

B 

C 

D 

E 

F 

1 G 1 

H 

1 

J 

1 

Name of the Trainer 

admin 

Your Name should come here 






2 

Date of the Training 

9/12/2014 

Today's Date should 

populate here 





3 

Training Course Name 

FM 









4 











5 











6 











T 




^ 





3 




ill- 






9 









io 




J 











1 1 











1 2 











1 3 











14 











1 5 








■ 



16 











17 











1 3 












r ’i 

Use Par_05_MyFirstMacro 

L .J 
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Creating a new Module 


QXI 

PRISTINE 


Right click on 
Modules 


Go to Insert 


Project - VBAPrpject 
















(General) 



E~$ Solver (SOLVE FLXLAM) 

E ^ VBAProject [Macros ■ 2,i 

Microsoft Excel Objects 
Sheet! (Sheet l) 
ThisW orkbook 

tSten 


w _2J View Code 
View Object 


VBAProject Properties,., 


^ JJserForm 


■%* Module 
$ Cli» Module 



P roj ect - ¥B AP roj ect _xj 

M 31 


U 



0-1 

E-Jg£ 

& 




Solver [SOLVE FLXLAM) 
VBAProject [Macros - 2.3 
\ Microsoft Excel Objects 
Sheetl (Sheetl) 

■■3^] ThisWorkbook 
Modules 




Module! 

r ^ 


ModuleZ 


rrr 



A new Module is added 
under Modules Folder 


Select Module 
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Laying Out Your Code Neatly 



PRISTINE 


Microsoft Visual Basic for Applications - Bookl - [VBABasics (Code); 


a 


File Edit View Insert Fermat Debug Run Tools Add-Ins Window Help 
H * A ® ^ ► JJ J ^ iff W © Ln 25, Col 1 


Type a question for help 


T _ |? X 


Project - VBAProject 


*1 

_ 3 


B-@ VBAProject (Bookl) 

□ v Microsoft Excel Objects 
Sheet 1 [Sheet 1) 
SheetZ [SheetZ) 
Sheet] (Sheet]) 
ThisWorkbook 
El-S Modules 

VBABasics 


Properties- VBABasics 


VBABasics Module 


Alphabetic j Categorized 
VBABasics 




T 



With 0 undenting 


Neat Code 


End Sub 


5 ub Without I dent ing [ ) 

Dim ws As Worksheet 

For Each ws In Worksheets 

If ws.Name <> n 5heeti n Then 

Debug . Print ws . Name 

ws . Delete 

End If 

Next ws 

End Sub 




► 


© EduPristine 


Macros 


56 






Code for the example 


HDU 

PRISTINE 


[□lib MyFirstMacro ( ) 

'Thing .Action 
1 Obj ect .Method 


Worksheets .Add 


Beginning a new subroutine 


Basic syntax of VBA instructions 



Comments 


Range ( M A1 
Range ( M A1 
Range ( n A2 
Range ( n A2 
Range ( "A3 
Range ( "A3 
Range ( r, El 
Range ( r, Bl 
Range ( r, B2 
Range ( n B2 
Range ( n B3 
Range ( n B3 



n ) .Select 'This line is used to select a particular cell r we can perfo: 
w ) .Value = "Name of the Trainer n 
n ) .Select 'Wot Rei 
w ) .Value = M Date of the Training 
rr ) .Select 'Not Required 
w ) .Value = n Training Course Name' 1 
*) .Select 'Hot Required 
n ) .Value = Environ ("username" ) 'Environ can be used with Computer name, 
rr ) .Select 'Not Required 
rr ) .Value = Date 
rr ) . Select 4 ' 1 NbtT Required 
rr ) .Value = ri FM" 


Assigning a value to a cell 


Text as input 


Using Functions to 
calculate values 


Selecting a cell 


' F o r ima 1 1 in g T e chni qu e s 
'Changing Font Color 
Range ( M A1 : A3 rT ) . Font . Color = vbRed 


I 


Changing Font Color 


'Changing the Background Colo: 
Range ( M A1 : A3 n ) . Interior . Color 


= rgbPaleTurquoise 


End Sub 


Changing Background color, to select a color: write rgb 
and press Ctrl + Spacebar, it will give you many options 
to choose 
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Running Code from the VB Editor 



PRISTINE 


Run the Code 


ft Microsoft Visual Basic for Applications - Macros - 2.xlsm - [Module! [Code)] 


L 


© 



Mod u lei Module - 

Alphabetic Categorized ] 


(Name) 


File Edit View Insert Format Debug Run Tools Add-Ins Windtow Help 

“ tj 3% U 


■reject - VBAProject: 




Sober (SOLVE R..XLAM 

E"^ VBAProject (Macros - 

□■■■ 3 Microsoft Excel Objet 

Sheet! (Sheet 1) 

Sheet2 (Sheet2) 

Sheet.3 (Sheets) 

iTl ThwWnrkhnnk 
rrr I t 


Properties - Modulel 


*1 


Modulel 


Type a question for help 


T — i? x 


(General 


3] [ P.!y First Macro 


~3 


Sub MyFirst Macro 


' Thing . Action 
' Ob j ect . Method 

Worksheets Add 


Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


{"Al") 
( "Al" ) 
( "A2 11 ) 
( "A2 " ) 
( r, A3" ] 
{"A3") 
( "Bl" J 
( "Bl" ) 
{"B2 n ) 
( "B2 " 
{"B3” 
{ n B3 n J 


Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 


if 


'This line is used to select a particula. 

"Name of the Trainer" 

'Mot Required 

Date of the Training" 

'Mot Required 
"Training Course Name" 

'Mot Required 

Envir on ( "username” ) 'Environ can be use* 
'Mot Required 
Date 

'Mot Required 
"FM" 


' Formatting Techniques 
1 Changing Font Color 
Range { "Al : A3" ) . Font . Color = vbRed 

1 Changing the Background Color 

Range ( "Al : A3 "). Interior . Color = rgbPaleTurquoise 


End Sub 




3 
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Running Code from the VB Editor pristine 


r m 

d T 

v Macros -2- Microsoft Excel 

= 1 


— sM' 
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Running Code from the VB Editor 


Go to Macros 
under the 
developer tab 



Macros -1 - Microsoft Excel 


Home Insert Page Layout Formulas Data Review View 


Developer 


acrobat 



1=3 |®3> \j^ ^ fe 

— ^ Es=i m IsJ 


Visual 

Basic 


Add-Ins COM Insert Design 

itk Add-Ins T Mode 


Source 


Code 


Add-Ins 


Controls 


* ”1 

j Map Properties 
Expansion Packs 
Refresh Data 
XML 



View Macros (Alt+FB) 

View the iist of macros, from which 
you can run, create,, or delete a 
macro. 





C 

D 

E 

F 

1 

Na 

Da 





^ Press FI for more help. 

. 

2 





3 

Training Course Mane 

FM 





4 







5 







6 
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Run the Macro 



Macros in: 
Description 


Open Workbooks 


Cancel 
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Running Code from the VB Editor 



PRISTINE 





Macros -2 - Microsoft Excel 


L 




File 


l£E=, 

|5| 

Visual Macros 
Basic (m 

Code 


Home Insert Page Layout Formulas Data Review View Developer Acrobat e = & S3 












Add-Ins COM 
Add-Ins 

Add -In 5 


Insert Design 
- Mode H 

Controls 


Source 


^ Map Properties 

Expansion Packs 

Refresh Data 
XML 





Document 

Panel 

M o d rFy 


B3 


v 


FM 


3 


D 


h” 


1 Mame of the Trainer 

2 Date of the Training 


admin 

9/12/2014 


Training Course Name |FM 


5 

6 


S 


H ^ ► t>'i 


Sheetl 


Sheet3 Sheet2 


Ready 


jin ioo% -) 


Q 


Efl 


<+) 




After running the code, a new sheet is created containing the data. 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 

• Introduction and context 

■ Key Concepts in Macros 

■ Macros as recorded Robots! 

■ Designing application to gather user data 

• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 

■ Understanding VBA 

• Understanding the relevant language constructs 

• Example: Write your First Macro 


Debugging VBA code 


• Errors in VBA 

• Step into VBA 

■ Writing more VBA Codes 

• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 

■ Advanced Financial Applications 

• Breaking circular loops 

• Monte Carlo Simulation 
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Syntax Errors pristine 


Red color show 
that there is 
some error in 
this line 


It show the place 
where error occur 


The dialog box show that 
what type of error occur 




O 

irSPKLect 
Value — 
) . Select 
) . Value 
) . Select 
) . Value 
) . Select 
) . Value 
) . Select 
) . Value 
) . Select 
) . Value 


i r 



Microsoft Visual Basic for ApplicatL. 



'This line is use d to select a particular cell, we can £ 
Name of the Trainer" 

'Not Required 
— "Date of — Tra - n a n r-r 1 r 

'Not Requi] 

"Training 
'Not Requii 
Environ ( " 

'Not Requi 
Date 

'Not Requi 
"FM" 


i 


Compile error 
Expected: list separator or) 


OK 


Help 


used with Computerr 


' Formatting Techniques 
' Changing Font Color 
Range ( "Al : A3 ” ) .Font -Color = vbRed 


If there is any mistake in the syntax , then a dialog box is pop up showing that 

there is error in code 
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Syntax Errors [^i'stine 


Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


The error is 
removed by using 
the ")" 



( "A2 " ) 
("A3") 
("A3") 
("Bl") 
("Bl") 
( "B2 " ) 
( "B2 " ) 
("B3") 
("B3") 


. Value 
. Select 
. Value 
. Select 
. Value 
. Select 
. Value 
. Select 
. Value 


1 P 


IP 


'This line is used to select a particular cell, we can perfc 
Name of the Trainer" 

'Not Required 
"Date of the Training” 

'Not Required 

Training Course Name" 

'Not Required 

Environ ( "username” ) 'Environ can be used with Computer name, 
'Not Required 
Date 

'Not Required 
"FM" 


’ Formatting Techniques 

1 Changing Font Color 

Range ( ”A1 : A3 ”). Font . Color — vbRed 

1 Changing the Background Color 

Range ( ”A1 : A3 ” ) . Interior . Color = rgbPaleTurquoise 
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Turning Off Syntax Error Messages 


■ Whenever we have any syntax error, a dialog box is Pop Up to show that there is error in line. 


Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


{"Al") -Select 
{"Al”f Value = 
<"A2") .Select 
{ "A2 " ) .Value = 
{"A3 ") .Select 
{"A3 ") .Value = 
( "Bl" ) . Select 
{"Bl") .Value = 
( "B2 " ) .Select 
{ "B2 " ) .Value = 
{"B3") . Select 
{"B3") -Value = 


'This line is used to select a particular cell, we can. j 
"Name of the Trainer" 

'Hot Required 
"Bate of t h a 


'Hot Requi] Microsoft Visual Basic: for Applicati... 
"Training 


'Hot Requi: 
Environ ( "1 
'Hot Requi: 
Date 
'Hot Requi: 
”FM" 


« 


Compile error 
Expected: list separator or) 


OK 


Help 


' Formatting Techniques 
' Changing Font Color 
Range ( "Al : A3 ” ) .Font. Color — vbRed 


used with Computerr 


HDU 

PRISTINE 
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Turning Off Syntax Error Messages 


To turn off the syntax error 
message. Go to Tool in menu bar 


Via eras - 2.xlsm - [Modul 



;)] 


Tools I^^Plns Windlow Help 


Debug Run 
> JJ J References,., 


a 



Additional Controls,.. 
Macros... 


Options.,. 

'.'BAProject Properties... 
Digital Signature... 


orksheets . Add 


Select 

Options 
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Turning Off Syntax Error Messages 


HDU 

PRISTINE 


■ Now if you have any syntax error in line, then dialog box will not Pop Up. Only the Color of the line will 
change to red to show that there is error in line. 


Worksheets .Add 

Range ("Al") .Select 'This line is used to select a particular cell. 
Range { "Al ”. Value = "Name of the Trainer" 

Range ( "A2 "|) . Select "Not Required 

Range ( ”A2 " ) .Value — "Date of the Training” 

Range ( "A3 ”). Select ’Not Required 

Range ( "A3 "). Value = "Training Course Name" 

Range ( "Bl" ). Select "Not Required 

Range ( "Bl" ). Value — Environ ( "username” ) 'Environ can be used with 

Range ( "B2 "). Select "Not Required 

Range ( "B2 "). Value — Date 

Range ( "B3 ”). Select ’Not Required 

Range ( "B3 "). Value = ”FM” 


' Formatting Techniques 

1 Changing Font Color 

Range ( "Al : A3 ” ) .Font. Color — vbRed 

1 Changing the Background Color 

Range ( "Al : A3 ”). Interior . Color = rgbPaleTurquoise 
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Compile Errors pristine 


Microsoft Visual Basic for Applications - Mac ros 2.*lsm - [Modulel [Code)] 


File Edit _J ew Insert 

! T H H ~ J1 & 


Project - VBAProject 



13- 


Sheet 1 (Sheet!) 
Sheet2 (Sheets) 
■■B] Sheet/ (Sheet2) 
■fi[] Sheets (Sheets) 
■ jT) ThisWorkbook 
I Modules 

Mnr: iIf 1 

rrr I t 


Modulel Module 
Alphabetic | Categorized | 
Mo dule 1 


Properties - Modulel 



L 


(U 


Run Tools Add-Ins Window Help 
B ^ fa? Sfe Q Ln 9, Col 9 


Type a question for help 
— 

_ J T 


’f _ A x 


- 


MyFirstMacro 


~3 


Sub MyFirstMacro 

1 Thing . Action 
' Ob j ect . Method 


Run the Code 


But it doesn't 
show error 


Worksheets .Add 


Range ("Al") .Select 

'This line is 

used to|^ 

^select a particula. 

|Rang ( "Al" ). Value = 

"Name of the 

Trainer”| 

rr i 


In this line word 
"Range" is not 
spell correctly 


Range ( "A2 ”)» Select 'Not Required 

Range ("A2") .Value = "Date of the Training" 

Range ( "A3 Select 'Not Required 

Range ( " A3 Value = "Training Course Name" 

Range ("Bl") .Select 'Not Required 

Range ("Rl") .Value = Environ ( "username" ) 'Environ can be use- 

Range ( "B2 "). Select 'Not Required 

Range ( 1P R2 " ) .Value = Date 

Range ("B3") .Select 'Not Required 

Range {"B3"J .Value = "FM" 


' Formatting Techniques 

' Changing Font Color 

Range ( "Al : A3 " ) .Font. Color = vbRed 

' Changing the Background Color 

Range ( "Al : A3 "). Interior . Color = rgbPaleTurquoise 


End Sub 
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Compile Errors pristine 


Error Message showing that 
there is error in code 



It show that this 
word have error 


Worksheets . Add 


Range 

{ 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


{"Al") 
"Al " ) . 
{ "A2 " ) 
( "'A2 " ) 
{ "A3" ) 
("'A3’') 
{"Bl") 
{"Bl") 
{"B2") 
( n, B2 ,r ) 
("B3") 
( "'B3 " ) 


. Select 
Value = 
. Select 
.Value : 
. Select 
.Value : 
. Select 
.Value : 
. Select 
.Value : 
. Select 
.Value : 



'This line is used to select/ a particular cell, 
"Name of the Trainer" 

’Mot Required 

"Date of ■ "■■ ■ ■»■ '■ mu 

'Not Recui Microsoft Visual Basic for Applicatlo... 

"Training 
’ Not Requ4 
Environ. ( 

’Not Requ4- 
Date 

’ Mot Requ4 
”FM" 


I 


Compile error: 

| Sub or Function not defined] 


OK 





sed with 


’ Formatting Techniques 
' Changing Font Color 
Range ( "Al : A3 ”). Font . Color = vbRed 



1 Changing the Background Color 

Range ( "Al : A3 "). Interior . Color = rgbPaleTurquoise 


The dialog box show that 
the function is not defined 
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Compile Errors 


When we click on OK and fix the code, you will notice that first line of subroutine is highlighted in yellow 
indicated that the subroutine is in break mode. 


■j^j Microsoft Visual Basic for Applications - Macros - 

2 .:d sm [break] - [Module! (Code)] 

i 1=1 

ts) — £Z— | 

File Edit View 

Insert 

Format Debug 

Run Tools Add-Ins. Window Help 

Type a question for help 

^ _ fi 1 x 

! m n - d ^ 

L& iJfl 

“3 V* k JJ 

^ ^ t 3 ? Ln 9, Col 9 



Project - VIE AP reject 

— , rcr — 1 

*![ 

j [General) 

t | P^yFirstPJIIacro 


_d 


El- 


■S] Sheet 1 (Sheet!) 
- jiPl Sheet2 (Sheet4) 
-Jp Sheet7 (SheetZ) 
■ffl Sheets (Sheets) 
-i pPl ThisWorkhook 
Modules 


Mndi iIp 1 

4 rrr 


Properties - Modulel 

X 

Mod u lei Module 

“VI 

Alphabetic Categorized 


| (Name) 





Suh MyFirstMacro{] 


p Thing . Action 
' Qh j ect . Method 

Worksheets . Add 


Range 
J t 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


r'Ai u ) 
,r Ai u ) . 
( ,P A2”) 

( ,p A2 11 ) 

( ,p A3 ” ) 
f ,P A3”) 
{"Bl" ] 
{"Bl") 
( n B2 ” ) 
( n B2 1P ) 
( 1 p B 3 ” ) 
( ,p B3 11 ) 


.. Select 
Value = 
.. Select 
.Value 
Select 
Value : 
.. Select 
.. Value 
.. Select 
.Value 
Select 
.Value 


'This line is used to select a particula. 
"Name of the Trainer” 

'Mot Required 
"Date of the Training” 

’Mot Reguired 
,p Training Course Name” 

'Mot Reguired 

Environ ( "username" ) 'Environ can he use* 
'Mot Reguired 
Date 

'Not Reguired 

1 p FM 1 p 


' Formatting Techniques 
' Changing Font Color 

Range ( ,p Al : A3 ” ) .Font .Color = vbRed 
' Changing the Background Color 

Range ( ,p Al : A3 ” ) « Interior „ Color = rgbPaleTurquoi 


End Sub 




EDU 

PRISTINE 


© EduPristine 


Macros 


70 





Compile Errors 



PRISTINE 


■ The best policy to run the subroutine again is to reset it. 


ft Microsoft Visual Basic for Applications - Ma 



2.>dsm [b 



Go to Run 


[Mod u lei (Code)] 


[°] 


: £ile Edit \_iew Insert 

-~3 T ^ jfe -ii 


Format D.ebug 

*7 v* j j 


R.u n Tools 


Project - VBAProject 

- 


I 


Wj Sheetl {Sheetl) 
W] SheetiZ {Sheet4) 
JQ Sheets -[Sheet!) 
IQ Sheets -[Sheets) 
* 1 ThisWorkbook 


Modules 

Mnrli ils= 1 


y £ rrr 

* 

Properties - Modulel 


Module! Module 

T3 

Alphabetic Categorized 

Module 1 


(General] 


<> 


S ulJd My 


J 


k 

J.J 


Add-Ins 
Continue F5 

B re a k Ct rl + B re a k 


Window Help 
Ln 9 r Col 9 


Type a question for help 


- _ r? 


Jk 


Reset 


Design M ode 

p Tiling . Action 
p Olo j sect . Method 

Worksheets .. Add 



- MyF i rstMacro 


- 


Select Reset 


Ra nge 

| { 

Range 
Ra nge 
Rsl nge 
Range 
Ra nge 
Ra nge 
Range 
Ra nge 
Range 
Range 


( " r j\i ri ) .Select 
’'Fkl"') .Vaiine = 
C » p ^2 ,p ) Select 
C" p Jk2 ,p ) .Value = 
C " p 2\3 ,p ) . Select 
C" p Jk3 ,p ) .Value = 
E ,P B1 ,P ) „ Select 
( ,P B1 IP ) .Value = 
£ * ' B 2 1 p ) -Seiect 
C" P B2 ,P ) .Value = 
( "" B3 " p ) _ Select 
( " r B3 "' ) Value = 


1 Tli is line is msedL to seiect a particul. 
"Mame of tlie Trainer 1 ' 
p Mot Re gut i :tr e dl 
"Date of tlie Training 1 ' 
p Mot Required 
"Training Course Mamie 1P 
* Mot Required 

Environ ("username") ' Environ earn Joe ms- 
p Mot Required 
Date 

1 Mot RegniirecL 

n FM 1P 


p Formatting Techniques 
' Changing Font Color 
Ra nge ( ”A1 :: Al 3 1P ) . Font .. Color 


= ■via Re d. 


p Changing tlie Baiclkgr onndL Color 

Range ( 1P Jkl : Jk3 1P ) . Interior . Color = rgbPaleTurquoise 
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Compile Errors 



PRISTINE 


Lets assume that we spell "Date" and "rgbPaleTurquoise" incorrectly. Then What happened? 


1*^~| Microsoft Visual Basic for Applications - Macros - 2.>dsm - [Module! (Code)] 


L 


(s) 


File Edit View Insert 


- A 


Jv 




Form at 
ary pj 


^ebug~"|Run Tools Add-Ins Wind 


ow 


Project - VBAProject 


_*] 


B- 


13 Sheet 1 {Sheet!) ^ 
il Sheet2 (Sheet-4) 

|3 Sheet7 (Sheets) 

|3 Sheets (Sheets) 
s jT3 Th i sWo r kbodk 
Modules 

Modi jIf- 1 

rrr | t 


Properties - 

Module! x| 

Mod u lei Module ^ | 

Alphahe 

tic 

Categorized | 

Module 1 


[Gener 


Su 


Compile VBAProject 



Step Into 

FB 


Step Oyer 

ShrFt+FB 

f*— 

Step Out 

Ctrl+Shift+FS 


Run T o Cursor 

Ctrl+ F8 


Add Watch... 



Ed it W ate h . . . 

Ctrl + W 


jQ.u i c k Watc h . ... 

Shift + F9 


Toggle Breakpoint 

F9 


C 1 ea r Al 1 B rea kp o i nts 

Ctrl + 'Shift + F9 


Set FJ ext Statement 

Ctrl + F9 

A 

Show Next Statement 



Help 
Col 28 


Type a question for help 





n/lyFilrstPJIac ro 


Compile the code 


used to 

Trainer 


select 


T training 


n P 


rvaiiy e ^ i 

Range ( "Bl” ) 
Range ( "El” ) 
Range ( ”B2 “ ) 
Range r'B2”) 
Range ( ”B3 ” ) 
Range ( ”B3 ” ) 


V ci. 


s line rs 
me of the 
Required 
te of the 
Reqnlr edL 

aining Course Marne” 

Select p Mot Required 

Value = Environ (''username 1 ') 1 Environ can 
Select 1 Mot R eqnlredL 
Value = | Pat 
Select p Mot Reqaiitr 
Value = ’'EM” 


particul. 


ns e- 



Spell Incorrectly 


p Formatting Techniques 
1 Changing Font Color 
Range ( "'Al : A3 ir ) „ Font . Color 


= ■vId Re d_ 


p Changing the Background Color 
Range ("Al : A3") - Interior . Color 



End Sub 

rl 
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J 

Compile Errors Rmstine 


■ It doesn't show any error message at the time of compile. And also run the code without showing error. 


£3 Microsoft Visual Basic for Applications - Macros - 2.>dsm - [Mod Lille 1 [Code]] 


Cal 


File Edit View Insert 


Project - VBAProject 

Itfl sM 


X 


a- 


W\ Sheet 1 (Sheet 1 ) 
jjj Sheet 2 (Sheets) 
(P| Sheet 7 (Sheets) 
(f] Sheets (Sheets) 
e Unis Workbook 
Modules 
i Mnr. j|e 1 

rrr I h 


Properties - Modulel 
Mod u lei Module 
Alphabetic | Categorized | 


*J 


[Name) 


Modulel 




Format JDebug Run Tools Add-Ins Window Help 

► DD Li g? tar & Lnl7 r Col28 


Type a question for help 


-Hi? X 


| [General] 

3 

[ 

My F i rstMac ro 

3 


Sub MyFirstMacro () 

p Thing . Action 
p Oto j ect - Method 

Worksheets . Add 


Range 
Ra n g e 
Range 
Range 
Range 
Ra n g e 
Range 
Range 
Range 
Range 
Range 
Ra n g e 


("A1 M 
("Al" 
ri A2 n 
"AS" 
{ "A3 lp 
{ "A3 11 
" B 1 11 


( 

( 

( ”B2 " 
( ”B2 " 
,r B 3" 
"B3" 


Bl" ) 

3 
3 
3 
3 


Select 

Value 

Select 

Value 

Select 

V a. In e 

Select 

Value 


This line Is nsed to select a particula, 
"Hame of the Trainer" 

Mot Required 

"Date of the Training" 

Mot Required 
1 r T r a ini ng C on rse M ame 1 r 
Mot Required 

Environ ( "us ername ” 3 ' Environ can toe u s e i 


Select 

’ Mot 

Required 

Value = 

Bat| 


Select 

’ Mot 

Re gu 1 r e d 

Value = 

" 1 



p Formatting Techniques 
p Changing Font Color 
Range ( "Al : A3 ” 3 - Font - Color 


= ■vJo Re d 


p Clanging the Background Color 

Range ("Al: A3") _ Inter lor . Color = rgbPaleTnrqnose 


End Suio 


== ^ 
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Compile Errors 



HDU 

PRISTINE 
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Option Explicit 



PRISTINE 



Option explicit is designed 
for working with variables 

Option Explicit 



Sub MyFirst Macro () 


' Thing . Action 
' Ob j ect . Method 

Worksheets .Add 


Range {"Al") 
Range ("Al") 
Range ("A2") 
Range ("A2") 
Range (’'A3") 
Range ("A3”) 
Range ("Bl”) 
Range ("Bl") 
Range ("B2") 
Range ("B2”) 
Range ("B3”) 
Range ("B3") 


. Select 
.Value = 
. Select 
.Value = 
. Select 
. Value = 
. Select 
.Value = 
. Select 
.Value = 
. Select 
.Value = 


This line is used to select 
"Name of the Trainer" 

Not Reqnired 

"Bate of the Training” 

Not Required 
"Training Course Name" 

Not Reqnired 

Environ ( "username” ) 'Environ 

Not Required 

Dat 

Not Reqnired 
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Compile Errors 


EDU 

PRISTINE 


■ ^| Microsoft Visual Basic for Applications - Macros - Zxlsm - [Modulel [Code]] 




L 


a 


File Edit View Insert 

il - id <£ -_i ,_j 


Project - VBAProject 

m d 




SheetZ (Sheet*) 
Sheets (Sheets) 
Sheet7 (SheetZ) 
Sheets (Sheets) 
ThisWorkbook 
El- ■. Modules 

Mnrlnlpl 

rrr | t 


Properties - Modulel 


x 


Modulel Module 
Alphabetic Categorized 



Module 1 


Format 
it) o 


Debug Run Tools Add-Ins Window 


Comp Me V BAP roj ect 

1 ■*■= 

r 

Step Into 

F8 

P 

Step Over 

Shift-*- F8 

n ^ 

Step Out 

Ctrl-*- Shift + F8 

u 

Run To Cursor 

Ctrl+ F8 


Add Watch... 



Ed it Watc h . . . 

Ctrl + W 


£Ju i c k Wat c h .... 

Shift-*- F9 


Toggle Breakpoint 

F9 


C.I ea r Al 1 B rea kp o i nts 

Ctrl + Shift+ F9 

d> 

Set N ext Statern ent 

Ctrl-*- F9 

9 

Show 1 N ext Statement 



Help 

LfoH 


Type a question for help 

■ 

^ 


- _ S 


MyFirstfVlacro 


Compile it again 


s line is used to select 
me of the Trainer” 
Required 


a particuia. 


IP 


Range ( " A3 ” ) -Select 'Not Required 

Range ("A3’') .Value — "Training Course Name” 

Range ("Bl") -Select 'Not Required 

Range ("Bl") .Value = Environ ( ”us er name ” ) 'Environ can be use- 

Range (”B2") -Select 'Not Required 

Range (”B2 n ) -Value — Cat 

Range ("B3") -Select 'Not Required 

Range ("B3") -Value = ”FM” 


' Formatting Techniques 
' Changing Font Color 

Range ("Al : A3") . Font - Color = vbRed 
' Changing the Background Color 

Range ("Al : A3") . Inter ior . Color = rgbPaleTurquose 


Zp-JLi 
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Compile Errors 



PRISTINE 


p Thing - Action 
' Ob j ect - Method 


Microsoft Visual Basic: for Applicati 


4 


Compile error 


Variable not defined 


ine is used to select . 
of the Trainer" 
squired 

of the Training" 
squired 

ping Course Name" 
squired 

Range ("Bl") .Value = Environ ( "username 11 ) p Environ 
Range ("B2") -Select 'Not Required 
Range ("B2 n ) - Value = tiff <- ~ 


OK 


Help 


Show the error in "Date" 


Range ( "B3 ")- Select p Not Required 
Range ("B3") .Value = ,P FM” 


Range ("Bl”) -Value = 
Range { "B2 " ) -Select 
Range ("B2”) -Value = 
Range ("B3") -Select 
Range {"B3") -Value = 


Environ ( "username" ) 'Environ can be 


Mot Req: 

Bate 


Microsoft Visual Basic for Applicati... 


Not Req 

" FM" 


Compile error: 
Variable not defined 


' Formatting Techniques 
1 Changing Font Color 
Range ( "Al : A3 " ) - Font - Color 


OK 


Help 



' Changing the Background Co. 
Range ( "Al : A3 " ) - Interior - Color = 



Show the error in "color" 
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Compile Errors 


o 
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Macros 



PRISTINE 


Check the "Require Variable 
Declaration" box 


Options 



Editor 1 Editor Format General | Docking | 


r Code Settings 


Auto Syntax Check 


V 


© 


r Reqiire Variable Declaration 
f Auto List Members 
F Auto Quick Info 
F Auto Data Tips 


F Auto Indent 
Tab Width: |"T" 


-Window Settings 

F Drag-and-Drop Text Editing 
P Default to Full Module View 
F Procedure Separator 


o 


OK 




Cancel 


Help 


Click Ok 
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Compile Errors 



PRISTINE 


■ Now whenever you create a new module, the Option Explicit is added automatically as first line of your 
subroutine. 


£J Microsoft Visual Basic for Applications - Macros - 2.>dsm - [Mod ulle2 (Code]] 


C°l 


Mod u lei Module 
Alphabetic j Categorized | 
ModuleZ 


£ile Edit \Jew Insert Format JDebug Run Tools Add-Ins Vvindow Help 

M - H A ca dft *7 O ► DD a ta? O 


Type a question for help 


- _ S’ X 


Project - VBAProject 





Sheet 7 {SheetZ) 
Bi Sheets {Sheet3) 
s pir*] This Workbook 
FI— \ Modules 

Module 1 


ModuleZ 


* 


rrr 


Properties - ModuleZ 


(General) 


3] l ( Dec la ratio n s ) 


3] 


Option Explicit 
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Runtime Errors 


Change the Range 
from B1 to ZZZ1 



PRISTINE 


Format 
n) t- 


Debug "Vun Tools Add-Ins Window Help 


(Gener 



Comp i 1 e V BAP roj ect 


;r 

Step Into 

F8 * 

e Jr 

Step Over 

Shift+F8 p 


Step Out 

Ctrl+Shift+F8 r 

U >J 

Run To Cursor 

Ctrl + FS 


Add Watch... 



Edit Watch.,. 

Ctrl+W 


Quick Watch... 

Shift+F9 

<5 

Toggle Breakpoint 

F9 


Clear All Breakpoints 

Ctrl+Shift+F9 

s 




Compile the code. It 
doesn't show error 
message. 


❖ 


Set Next Statement 
Show Next Statement 


line is used, to st 
Ctrl+F. me of the Trainer" 

Required 



rvtargts \ - uate of the Training” 

Range ( "A3 ”). Select 'Wot Required 
Range ("A3”) .Value - "Training Course Name" 
Range ( "Bl" ). Select 'Wot Required 
Range (" SZi 31" ). Value = Environ ( "username” ) 


Range ("B2”) .Select 
Range ( "B2 ”). Value : 
Range ("B3”) .Select 
Range ( "B3” ). Value : 


’Wot Required 
Date 

’Wot Required 
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Runtime Errors pristine 


1 Thing . Action 
p Ob j ect . Method 

Worksheets - Add 

Range ("Al 11 ) - Select 
Range ("Al") . Value = 
Range ("AS"') - Select 
Range ( ,r A2 11 ) - Value = 
Range ( "A3 " ) - Select 
Range {"A3") -Value = 
Range ( "Bl" ) .Select 
Range ("ZZZl") -Value 
Range ( ,r B2") .Select 
Range (”B2 ir ) -Value = 
Range ( "B3 " ) - Select 
Range ( ,r B3 " ) - Value = 


1 Th 
"Nkl 
p No : 
"D.i 


i r 


Microsoft Visual Basic 


Run-time error '1QQ4 1 : 

Method 'Range’ of object 'jGlobal' failed 


Continue 


End 


Debug 


Help 


P It T 


_g P 

No 





= Environ ( "username” ) 
'Not Required 
Bate 

'Not Required 

' r ym' t 


'Environ can be used w 


But at runtime, error 
message is shown 


Click on Debug 



Range ( "Al” ) .Select 
Range ( "Al" ) .Value — 
Range (”A2”) .Select 
Range ( ”A2 ” ) .Value = 
Range ( "A3 " ) .Select 
Range (”A3") .Value - 
Range ( "Bl” ) .Select 


This line is used to s> 
"Name of the Trainer" 
Mot Required 
"Bate of the Training" 
Mot Required 
"Training Course Name" 
Mot Required 


| B.ange (" 3Z31" ) .Value — Environ ( "username" ) 



Range ("B2") .Select 'Mot Required 
Range ( "B2 Value = Date 
Range ( "B3 ” ) .Select 'Mot Required 
Range ("B3") .Value - ”FM" 


The highlighted show that 
this line contain error 
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Runtime Errors 



PRISTINE 


The cell Bl, B2, B3 
is empty. Because 


Output show that code 
is running just before the 

error 



the code could 
not run due to 
error 


© EduPristine 


Macros 


82 




Stepping Through a Subroutine pristine 


This will execute the code step by step 



Go to Debug 


| Debug | Run Tools Add-Ins Window 
Comp i I e VB AP roj ect 



Step Into 

F8 

Step Over 

Shift* FB 

Step Out 

Ctrl* Shift* F8 

Run To Cursor 

Ctrl+FB 

Add Watch... 


Edit W ate h... 

Ctrl+W 

Quick Watch... 

Shift* F9 

Toggle Breakpoint 

F9 

Clear All Breakpoints 

Ctrl* Shift* F9 

Set Ned Statement 

Ctrl* F9 

Show Next Statement 




n 


Select Step Into 
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Stepping Through a Subroutine 



PRISTINE 


This highlighting 
show that this 
line is not 
executed yet 


O p t ion Explici t 


ulb MyFirstMacro () 


' Thing - Action 
' Ob j ect . Method 

Worksheets -Add 


Now press F8 to 
execute the code 
step by step 


Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


( " Al 11 ) 
("Al") 
("A2") 
("A2") 

( "A3 ,p ) 

( "A3 ,p ) 

( ,p Bl ,p ) 

{"ZZZl 

("B2") 

( " B2 ,p ) 

( " B3 " ) 
("B3") 


a parti 


i r 


i r 


-Select p This line is used to select 
. Value = "Name of the Trainer" 

-Select 'Not Required 
-Value = "Date of the Training 
-Select 'Not Required 
-Value = "Training Course Name 
-Select 'Not Required 

rp ) .Value = Environ ( "username” ) 'Environ can 

-Select 'Not Required 

- Value = Date 

-Select 'Not Required 

.Value = "FM” 


' Formatting Techniques 
' Changing Font Color 

Range {"Al: A3") -Font -Color = vbRed 
' Changing the Background Color 

Range ( "Al : A3 " ) - Interior „ Color = rgbPaleTurquoise 


End Sub 
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Setting Breakpoints 



PRISTINE 


Breakpoint 



Range ("Bl") .Value = 
Range ("B2") .Select 
|Range ("B2”) .Value = 
Range ( "B3 ” ) . Select 
Range ( "B3 Value = 


Environ ( "username” ) 
Not Required 
Bate 

Not Required 


' Formatting Techniques 
1 Changing Font Color 


Range { "Al : A3 ”) - Font . Color = vbBlu 


' Environ 


’ Changing the Background Color 

Range ( "Al : A3 ”). Interior . Color — rgbPaleTurquoise 
End Sub 


We can set it at any line by pressing F9. 
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Setting Breakpoints 



PRISTINE 


Op tion Explicit 


The code is 
executed till that 
point 



Sub MyFirstMacro 0 

1 Thing . Action 
1 Ob j ect . Method 

Worksheets . Add 


Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 

Range 


{"ai" 

{"Al") 
{"A2") 
{ "A2 ” 

{ "A3 ” 
("A3") 
("Bl" 
{"Bl" 

( "B2 ) 
( "B2 ) 
( "B3 ) 
{"B3") 


Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 

Select 

Value 


IF 


'This line is used to select a 
"Name of the Trainer" 

’Not Required 
"Bate of the Training” 

'Not Required 

Training Course Name" 

'Not Required 

Environ ( "username” ) 'Environ i 
'Not Required 
Date 

'Not Required 
"I’M" 



' Formatting Techniques 
' Changing Font Color 

Range ( ” Al : A3 ” ) . Font . Color = vbBlue 


' Changing the Background Color 

Range ( "Al : A3 Interior . Color = rgbPaleTurquoise 


The rest of the lines will 
executed by pressing F8 key 


End Sub 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 

• Introduction and context 

■ Key Concepts in Macros 

■ Macros as recorded Robots! 

■ Designing application to gather user data 

• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 

■ Understanding VBA 

• Understanding the relevant language constructs 

• Example: Write your First Macro 

■ Debugging VBA code 

• Errors in VBA 

• Step into VBA 


Writing more VBA Codes 


• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 

■ Advanced Financial Applications 

• Breaking circular loops 

• Monte Carlo Simulation 


© EduPristine 


Macros 


87 
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Random Number Generator - Looping functions in VBA pristine 


■ For repetitive work, VBA has looping functions 

• Much more powerful than direct formulas 

• For-Next loop 


Sub Randoniaenerator ( ) 

Dim number As Integer 

Dim i As Integer 

numb e r = Rang e ( " Numb ei n ) 

Range ( W D:D W ) .Clear 
For i = 1 To number 

Celle (i f *3) = Application. WorkeheetFunction . RandBe tween (10 f 100) 
Next I 
End Sub 


10 


Generate Random Numbers 



29 

98 

75 

60 

47 

85 

12 

36 

85 

74 


r ^ 

Use Par_06_Function-Randbetween 

L A 
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Calling Excel Functions in VBA 



PRISTINE 


■ Syntax 

• Application.worksheetfunction.Whatever function 


1 ■ p* 

i j ¥s 

0 Ln 1, Col 1 

m 



(General) 




V 


poti RandomSenerator ( ) 

Dim number As Integer 
Dim i As Integer 
numb e r = Rang e ( n Numb e r n ) 
Range ( n D, D ri ) . Clear 
For i = 1 To number 


Random' 


Cells (i f "3 ) = Application . Nor ksheet Function . RandBe tween ( 10 f 100) 


Next i 
End 3ub 
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Message Box 



PRISTINE 


Sub My Fi r s tMs gB ox ( ) 
m3 gb ox 

Ms g B ox [ Promp t [Buttons As VbMsg B oxStyle - vbOKOnly], [Trtfe], [HeipRiej lContexf\) As VbMs g B oxResul t 

MsgBox "Do You like the Training?™ 

'Aesthetics of the MessageBox 

MsgBox "Do you like the Training? " r vbQuestion r n Feedback Question 11 
'Without remembering the order of commands 

MsgBox prompt :="Do you like the Training?' 1 f Buttons :=vbQuestion f Title :="Feedback Question 0 
'Joining Two or more statements in the MessageBox 

MsgBox "Training is on: ° £ Date £ 11 . Are you coming for the same?" 

'New Line Statement 

MsgBox "Training is on: n £ Date £ 11 . 11 £ vbNewLine £ "Are you attending?" 

'Reading from the excel file 

MsgBox Range ("Al") .Value £ " is a good Trainer. 11 
'Yes /No Button 

MsgBox "Do you like the Training?" r vbQuestion + vbYesNo, "Feedback Question" 


End Sub 
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Message Box - Result 






e 


Feedback Question 


X 



Doyou liketheTraining? 


OK 



Microsoft Excel 




Microsoft Excel 



Christos is a good T rainer. 


Training is on: 9/1 3/201 4, 
Are you attending? 





OK 
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PRISTINE 



Feedback Question 


X 


► 



Doyou liketheTraining? 


OK 



o 


91 













Message Box - Storing the value of the Message Box 



PRISTINE 


3ub My 3 e c ondMs gB ox ( ) 


'Store a re3ult of MessageBox 

‘Declaring a variable, could Lave declared variable as Integer but have to remember each 
Dim Button As VhHsgBosResult 


'Storing Value of the MessageBox result in the variable, brackets are used as MessageBox 
Button = MsgBox ("Do you like the Training?", vbQuestion + vbYesNo, "Feedback Question") 

'Conditions: If Loop 
If Button = vbYes Then 

MsgBox "Thanks for the Feedback." 

Else 

MsgBox "Could you please elaborate." 

End If 

End Sub 
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Message Box - Storing the value of the Message Box - Result pristine 



Microsoft Excel 



If Yes 



If No 


▼ 
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Input Box 



PRISTINE 


3 lib My Fi r s t Inputs ox ( ) 

"Basic InputE ox 

InputE ox "Please type your Name . 11 , "Personal Details" , "Enter Your Name Here 


"Store the Value in excel file 

Range ( "A2 ") .Value = Input Box ( "Please type your Name.", "Personal Details", "Enter Your Name Here.....") 
End Sub 


Sub MySecondlnputBox ( ) 

"Display value of InputBox as MessageBox 

"Declare the variable to store value 
Dim Your Name As String 

"Storing the value in the variable 
YourName = InputBox ( "Please type your Name.") 

"Looping with Do Until 
Do Until YourName <> "" 

If YourName = "" Then 

MsgBox "You didn't enter Your Name, Flease write it." 

YourName = InputBox ( Tl Please type your Name.", "Personal Details") 

Else 

MsgBox "Hello " & YourName 
End If 

Loop 

MsgBox "Hello " £ YourName 
End Sub 
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Agenda 



PRISTINE 


■ Introduction to Macros & Advanced Application Building in Excel 

• Introduction and context 

■ Key Concepts in Macros 

■ Macros as recorded Robots! 

■ Designing application to gather user data 

• Implementing user forms in Excel Macros 

• Linking forms to excel cells 

• Building flexible Charts in Excel 

■ Understanding VBA 

• Understanding the relevant language constructs 

• Example: Write your First Macro 

■ Debugging VBA code 

• Errors in VBA 

• Step into VBA 

■ Writing more VBA Codes 

• Random Number Generator: Use of Loop, Excel Functions 

• Message Box, Input Box 


Advanced Financial Applications 


Breaking circular loops 
Monte Carlo Simulation 
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IDC: Breaking Circular Loops pristine 


Duration ot Construction 

Year 1 

Year 2 

Year 3 


Project Funding Schedule 


Equity Commitment 

75.0 

37.5 

37.5 

Grant 

- 

50.0 

50 0 

New Debt Raised 

*feJ05.3 

161.1 

351.7 

Total Funds 

1 U J SI ' 

248.6 

439.2 


Interest During Construction IDC) 
Outstanding Debt 

Interest During Construction (IDC) 
Toll Equipments 
Project Cost Schedule 
EPC Cost 
Toll Equipments 
Dev. / Admin./ Superv. Charges 
IDC 


0 



kj05.3 

' 266.3 

618.1 


X 

! 

5.3 

18.6 

44.2 




25.0 

30.0 

45.0 


- 

- 

200 0 


150 0 

200.0 

1SIL0- 

— 

r 5X 

— - — | u .. u 

44.2 



248.6 

439.2 


Total Project Cost 


Cover Road Project F unding 


_ 


Because of circular dependencies, 
the sheet can enter into 
inconsistent state 


Use Par 08 IDC 
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IDC: Basic Algorithm 


HDU 

PRISTINE 


l 


5.0 


17.1 


25.0 


150.0 


175.0 


5.0 


30.0 


200.0 


230.0 


39.6 


45.0 


200.0 


150.0 


395.0 


Copy the Interest in Another Row 
Paste {Onlythe Values asa project Cost) 

The interest Gets updated 

Paste again (Till you are satisfied that the differece is negligible) 



The Copy & Paste Special has to be 
repeated again and again. This can be 
achieved by Recording 
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IDC: Recording the Macro pristine 
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IDC: Macro by Recording 



PRISTINE 


Sub IDC ( } 

IDC Macro 

Keyboard Shortcut: Ctrl+Shif t-I 

Range (Selection, Selection .End (xITo Right) ) .Select 
Selection . Copy 
Range n ) .Select 

Selection . FasteSpecial Faste :=xlFasteValues r Operation :=xlNone f SkripBlanha 



The Macro is able to copy and paste 
special the values once 
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IDC: Editing (with for loop) for the desired results 



PRISTINE 
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IDC: Writing the code instead of Recording with Name Ranges 



PRISTINE 


Sub FinallDC () 

P 

' IDC Macro 
' Written Macro 

Dim i As Integer 

For i = 0 

Range r Initial_Intere, gt " i 

Ran g e iX^ina l_In t e r e sxL 1 1 ) . PasteSpecial xlPasteYalues 
Next i 

Application . CutCopyMode = False 
End Sub 


Name Ranges 
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Monte Carlo Simulation (MCS) 



PRISTINE 


■ There is a fair amount of uncertainty and risk involved with estimating the future value of figures or amounts 
due to the wide variety of potential outcomes. 

• Monte Carlo simulation (MCS) is one technique that helps to reduce the uncertainty involved in estimating 
future outcomes. 

■ MCS can be applied to complex, non-linear models or used to evaluate the accuracy and performance of 
other models. 

• risk management, 

• portfolio management, 

• pricing derivatives, 

• strategic planning, 

• project planning, 

• cost modeling and other fields. 


r ^ 

Technique that converts uncertainties in input variables of a model into probability distributions 

Combining the distributions and randomly selecting values from them, it recalculates the simulated model many 

times and brings out the probability of the output. 
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MCS: Frequently Used Distributions for MC 



PRISTINE 


■ Normal/Gaussian Distribution 

• where the mean and the standard deviation are given and the mean represents the most probable value of the 
variable. It is symmetrical around the mean and is not bounded 

■ Lognormal Distribution 

• Appropriate for a variable ranging from zero to infinity, with positive skewness and with normally distributed 
natural logarithm 

■ Triangular Distribution 

• With fixed minimum and maximum values. It is bounded by the minimum and maximum values and can be 
either symmetrical (the most probable value = mean = median) or asymmetrical. 

■ Uniform Distribution 

• Contrast to the triangular distribution, the likelihood of occurrence of the values between the minimum and 
maximum is the same. 


■ Exponential Distribution 

• Used to illustrate the time between independent occurrences, provided the rate of occurrences is known. 
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MCS: Probabilistic Growth in Price and Volume 


I^DU 

PRISTINE 


■ Assumptions 

• Initial Price and Volume of Material Sold 

• Mean Growth and the Std Deviations 


Initial Price 

100 

Initial Volume 

100 

Initial Revenue 

10000 



M e a n G ro wth i n P rice 

I in 

Mean Growth in Volume 

396 

Std. Deviation of Price Growth 

396 

Std. Deviation of Volume Growth 

296 




■ Generating the Probability Distribution of Price 
and Volume Growth 

• Rand() Generates Uniform Random 

• Normsinv() to generate in normal form 


Random Numberfor Price 
Random IMumberfor Volume 
Growth in Price 
Growth in Volume 


0.225121 
0.235 3S4 
1.73% 
1.56% 


■ Use the probabilistic price and volume to 
project the revenues 


Mew Price 
Mew Volume 
Mew Revenue 


101.735 
ii 1 

101 ,5575 
=B1B*B19 


Use Par 09 MCS 


RANDQ 

NORMINV(B13,BS,B10j 
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MCS: Implementing Monte Carlo Simulation pristine 


■ The process of projecting revenues is to be repeated "n" number of times. This can be achieved with the help 
of a Macro. 


^ub MCS ( ) 

3 Irani a t i on 3 = Rang e [ ' 1 3 Irani a t i on a n ) 

Dim NewFrice As Double 

Dim NewVolume As Double On Error Resume Next 

Dim NewRe venue As Double Columna ( ^D: a") . SpecialCells (xlCellTYpeConstants r xlNumbera ) . ClearContenta 

Dim i As Integer On Error GoTo 0 

Dim Simulations As Integer 


Variable Declaration 


2. Emptying the Vars & Cells 


For i = 1 To Simulations 
Calculate 

NewFrice = Range ( w Ne wF r i c e n ) 
NewV o Inrae = Rangel 71 Ne wV o Inrae n ) 


ITewRevenne 

= 

Range ( "NewRevenne rT ) 


Celia (i 


2, 

4 ) 

= i 

Range ( n FinaIFrice n ) = Worksheet Function. Average (Range ( n E iE") ) 
Range ( n Final Volume ^ ) = Worksheet Function. Average (Range ( n F : F ,T ) ) 

Celia (i 


2 r 

5) 

= NewFrice 

Range ( w Final Revenue n ) = Range ( Tl FinalFr ice rT ) * Range ( n Fin a I Volume n ) 

Celia (i 


2, 

6) 

= NewVolume 


Celia (i 


2, 

7) 

= NewRevenne 



Range ( n Iteratior_No n ) = i 

Next 


r ^ 

3. For Loop to run the simulation 

'n' times 

L j 


4. Calculating Average 
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MCS: Interpreting the Output 



PRISTINE 



Max 

Min 

Interval 

Price 

112.1896 

94.86102 

2 

Volume 

105.5687 

99.62634 

1 

Revenue 

11522.26 

9761.941 

176 



Range Price 


Volume 

96 

1 

0 

97 

0 

0 

98 

0 

0 

99 

3 

0 

100 

3 

4 

101 

5 

2 

102 

4 

12 



Price 



lUhfflatOHfNmtin 115 N ® Ol □ H IN 

CT-i iJi CTi 1 J 1 O O O O O O O O O O tH . r -H t- H. . 

■: — i t — I t — I t — I t — I t — I -HI ■: — i — i i — I — I [ | | 

I Hnri7n 



1 V 

■ it. 

=REPT(" 

|",R14) 

H 

1 

J 


Progress 





The Progress Bar Implemented with 
"Rept()" formula 


Volume 
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Thank you! 
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